package ltd.ninefish.framework.datascope.aspect;

import cn.hutool.core.convert.Convert;
import cn.hutool.core.util.ArrayUtil;
import cn.hutool.core.util.ObjUtil;
import cn.hutool.core.util.StrUtil;
import ltd.ninefish.framework.core.dto.BaseDto;
import ltd.ninefish.framework.core.handler.SecurityContextHolder;
import ltd.ninefish.framework.datascope.annotation.DataScope;
import ltd.ninefish.framework.datascope.enums.QueryType;
import ltd.ninefish.framework.security.utils.SecurityUtil;
import ltd.ninefish.framework.systemapi.dto.LoginUserDto;
import ltd.ninefish.framework.systemapi.dto.SysRoleDto;
import ltd.ninefish.framework.systemapi.dto.SysUserDto;
import org.aspectj.lang.JoinPoint;
import org.aspectj.lang.annotation.Aspect;
import org.aspectj.lang.annotation.Before;
import org.springframework.stereotype.Component;

import java.util.ArrayList;
import java.util.HashMap;
import java.util.List;
import java.util.Map;

/**
 * @author zhaoxiubin
 * create-time 2024-01-21 12:12
 * description 数据过滤处理
 **/

@Aspect
@Component
public class DataScopeAspect {
    /**
     * 全部数据权限
     */
    public static final String DATA_SCOPE_ALL = "1";

    /**
     * 自定数据权限
     */
    public static final String DATA_SCOPE_CUSTOM = "2";

    /**
     * 部门数据权限
     */
    public static final String DATA_SCOPE_DEPT = "3";

    /**
     * 部门及以下数据权限
     */
    public static final String DATA_SCOPE_DEPT_AND_CHILD = "4";

    /**
     * 仅本人数据权限
     */
    public static final String DATA_SCOPE_SELF = "5";

    /**
     * 数据权限过滤关键字：Mapper
     */
    public static final String DATA_SCOPE = "dataScope";
    /**
     * 数据权限过滤关键字：Wrapper
     */
    public static final String DATA_SCOPE_WRAPPER = "dataScopeWrapper";

    @Before("@annotation(controllerDataScope)")
    public void doBefore(JoinPoint point, DataScope controllerDataScope) throws Throwable {
        clearDataScope(point);
        handleDataScope(point, controllerDataScope);
    }

    protected void handleDataScope(final JoinPoint joinPoint, DataScope controllerDataScope) {
        // 获取当前的用户
        LoginUserDto loginUser = SecurityUtil.getLoginUser();
        if (ObjUtil.isNotNull(loginUser)) {
            SysUserDto currentUser = loginUser.getSysUser();
            // 如果是超级管理员，则不过滤数据
            if (ObjUtil.isNotNull(currentUser) && !currentUser.isAdmin()) {
                String permission = StrUtil.emptyToDefault(controllerDataScope.permission(), SecurityContextHolder.getPermission());
                dataScopeFilter(joinPoint, currentUser, controllerDataScope.query(), controllerDataScope.deptAlias(),
                        controllerDataScope.userAlias(), permission);
            }
        }
    }

    /**
     * 数据范围过滤
     *
     * @param joinPoint  切点
     * @param user       用户
     * @param queryType
     * @param deptAlias  部门别名
     * @param userAlias  用户别名
     * @param permission 权限字符
     */
    public static void dataScopeFilter(JoinPoint joinPoint, SysUserDto user, QueryType queryType, String deptAlias, String userAlias, String permission) {
        StringBuilder sqlString = new StringBuilder();
        Map<String, Map<String, Object>> mapParams = new HashMap<String, Map<String, Object>>();
        List<String> conditions = new ArrayList<String>();

        for (SysRoleDto role : user.getRoles()) {
            String dataScope = role.getDataScope();
            if (!DATA_SCOPE_CUSTOM.equals(dataScope) && conditions.contains(dataScope)) {
                continue;
            }
            if (StrUtil.isNotEmpty(permission) && ArrayUtil.isNotEmpty(role.getPermissions())
                    && !ArrayUtil.containsAny(Convert.toStrArray(role.getPermissions()), Convert.toStrArray(permission))) {
                continue;
            }
            if (DATA_SCOPE_ALL.equals(dataScope)) {
                sqlString = new StringBuilder();
                break;
            } else if (DATA_SCOPE_CUSTOM.equals(dataScope)) {
                sqlString.append(StrUtil.format(
                        " OR {}.dept_id IN ( SELECT dept_id FROM sys_role_dept WHERE role_id = {} ) ", deptAlias,
                        role.getId()));
            } else if (DATA_SCOPE_DEPT.equals(dataScope)) {
                sqlString.append(StrUtil.format(" OR {}.dept_id = {} ", deptAlias, user.getDeptId()));
            } else if (DATA_SCOPE_DEPT_AND_CHILD.equals(dataScope)) {
                sqlString.append(StrUtil.format(
                        " OR {}.dept_id IN ( SELECT dept_id FROM sys_dept WHERE dept_id = {} or find_in_set( {} , ancestors ) )",
                        deptAlias, user.getDeptId(), user.getDeptId()));
            } else if (DATA_SCOPE_SELF.equals(dataScope)) {

                if (StrUtil.isNotBlank(userAlias)) {
                    sqlString.append(StrUtil.format(" OR {}.user_id = {} ", userAlias, user.getId()));
                } else {
                    // 数据权限为仅本人且没有userAlias别名不查询任何数据
                    sqlString.append(StrUtil.format(" OR {}.dept_id = 0 ", deptAlias));
                }
            }
            conditions.add(dataScope);
        }

        if (StrUtil.isNotBlank(sqlString.toString())) {
            Object params = joinPoint.getArgs()[0];
            if (ObjUtil.isNotNull(params)) {
                if (params instanceof BaseDto) {
                    BaseDto baseDto = (BaseDto) params;
                    baseDto.getParams().put(DATA_SCOPE, " AND (" + sqlString.substring(4) + ")");
                }
            }
        }
    }

    /**
     * 拼接权限sql前先清空params.dataScope参数防止注入
     */
    private void clearDataScope(final JoinPoint joinPoint) {
        Object params = joinPoint.getArgs()[0];
        if (ObjUtil.isNotNull(params)) {
            if (params instanceof BaseDto) {
                BaseDto baseDto = (BaseDto) params;
                baseDto.getParams().put(DATA_SCOPE, StrUtil.EMPTY);
            }
        }
    }
}
